home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
CDS.BAT
< prev
next >
Wrap
DOS Batch File
|
1994-09-07
|
2KB
|
55 lines
echo off
cls
: repeat
cls
echo.
echo ┌─────────── OTHER CD ROMS FROM PDSL VIEW CONTENTS LISTS ──────────┐
echo │ │
echo │ Press [a] VIEW CONTENTS LIST FOR SCIENTIFIC & TECHNICAL CD ROM │
echo │ [b] VIEW CONTENTS LIST FOR BEST APPLICATIONS CD ROM │
echo │ [c] VIEW CONTENTS LIST FOR FONTS & CLIPART CD ROM │
echo │ [d] VIEW CONTENTS LIST FOR GREATER AND LESSER MYSTERIES CD │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ │
echo │ Press escape to exit back to DOS │
echo ├───────────────────────────────────────────────────────────────────┤
echo └───────────────────────────────────────────────────────────────────┘
echo.
:loop
BATCH /a Hit a Key
if errorlevel 124 goto loop
IF ERRORLEVEL 101 GOTO loop
IF ERRORLEVEL 100 GOTO d
IF ERRORLEVEL 99 GOTO c
IF ERRORLEVEL 98 GOTO b
IF ERRORLEVEL 97 GOTO a
IF ERRORLEVEL 96 GOTO loop
if errorlevel 32 goto loop
IF ERRORLEVEL 27 GOTO Exit
if errorlevel 26 goto loop
if errorlevel 13 goto loop
: a
VIEW INDEX.TXT
goto repeat
: b
VIEW BEST.TXT
goto repeat
: c
VIEW FONTS.TXT
goto repeat
: d
VIEW MYST.TXT
goto repeat
:Exit
exit
rem Copyright (c) 1994 PDSL Sussex UK